home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 February: Tool Chest / Dev.CD Feb 00 TC.toast / pc / what's new? / sample code / graphics 3d / setupgl / setupgl main.c < prev    next >
Encoding:
Text File  |  1999-12-18  |  17.9 KB  |  639 lines
  1. /*
  2.     File:        SetupGL Main.c
  3.  
  4.     Contains:    An example of the use of the SeupGL utility code.  This sample builds a context and lets the user control
  5.                 the specifications on the fly, rebuilding the context when the request changes.  Controls are:
  6.                 Left/right arrows: smaller or larger resolution context
  7.                 Up/down arrows: 32/16 bit pixel depth toggle
  8.                 left/right bracket: chnage requested screen down or up one
  9.                 w: go to windowed mode
  10.                 f: go to fullscreen mode            
  11.  
  12.     Written by:    Geoff Stahl
  13.  
  14.     Copyright:    1999 Apple Computer, Inc., All Rights Reserved
  15.  
  16.     Change History (most recent first):
  17.  
  18.  
  19.     Disclaimer:    IMPORTANT:  This Apple software is supplied to you by Apple Computer, Inc.
  20.                 ("Apple") in consideration of your agreement to the following terms, and your
  21.                 use, installation, modification or redistribution of this Apple software
  22.                 constitutes acceptance of these terms.  If you do not agree with these terms,
  23.                 please do not use, install, modify or redistribute this Apple software.
  24.  
  25.                 In consideration of your agreement to abide by the following terms, and subject
  26.                 to these terms, Apple grants you a personal, non-exclusive license, under Apple’s
  27.                 copyrights in this original Apple software (the "Apple Software"), to use,
  28.                 reproduce, modify and redistribute the Apple Software, with or without
  29.                 modifications, in source and/or binary forms; provided that if you redistribute
  30.                 the Apple Software in its entirety and without modifications, you must retain
  31.                 this notice and the following text and disclaimers in all such redistributions of
  32.                 the Apple Software.  Neither the name, trademarks, service marks or logos of
  33.                 Apple Computer, Inc. may be used to endorse or promote products derived from the
  34.                 Apple Software without specific prior written permission from Apple.  Except as
  35.                 expressly stated in this notice, no other rights or licenses, express or implied,
  36.                 are granted by Apple herein, including but not limited to any patent rights that
  37.                 may be infringed by your derivative works or by other works in which the Apple
  38.                 Software may be incorporated.
  39.  
  40.                 The Apple Software is provided by Apple on an "AS IS" basis.  APPLE MAKES NO
  41.                 WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED
  42.                 WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  43.                 PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN
  44.                 COMBINATION WITH YOUR PRODUCTS.
  45.  
  46.                 IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR
  47.                 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  48.                 GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  49.                 ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION
  50.                 OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT
  51.                 (INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN
  52.                 ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  53.     
  54.          <4>    12/18/99    ggs     Fix headers
  55. */
  56.  
  57.  
  58. // system includes ----------------------------------------------------------
  59.  
  60. #include <Devices.h>
  61. #include <Dialogs.h>
  62. #include <DriverServices.h>
  63. #include <Events.h>
  64. #include <LowMem.h>
  65. #include <TextEdit.h>
  66. #include <ToolUtils.h>
  67. #include <Windows.h>
  68.  
  69. #include <math.h>
  70. #include <stdio.h>
  71. #include <string.h>
  72.  
  73. #include <gl.h>
  74.  
  75. // project includes ---------------------------------------------------------
  76.  
  77. #include "SetupGL.h"
  78.  
  79. // prototypes ---------------------------------------------------------------
  80.  
  81. void InitToolbox(void);
  82. Boolean SetUp (void);
  83. void DoMenu (SInt32 menuResult);
  84. void DoKey (SInt8 theKey, SInt8 theCode);
  85. void DoUpdate (void);
  86. void DoEvent (void);
  87. void CleanUp (void);
  88.  
  89. void drawGL(AGLContext aglContext, pstructGLInfo pglInfo);
  90.  
  91. void DrawFrameRate (GLuint fontList);
  92. void DrawContextInfo (GLuint fontList);
  93.  
  94. void DrawPSringGL (Str255 pstrOut, GLuint fontList);
  95. void DrawCSringGL (char * cstrOut, GLuint fontList);
  96. GLuint BuildFontGL (AGLContext ctx, GLint fontID, Style face, GLint size);
  97. void DeleteFontGL (GLuint fontList);
  98.  
  99.  
  100. // statics/globals (internal only) ------------------------------------------
  101.  
  102. // Menu defs
  103. enum 
  104. {
  105.     kNumRes = 10,
  106.     kNumFreqs = 11,
  107.  
  108.     kMenuApple = 128,
  109.     kMenuFile = 129,
  110.     
  111.     kAppleAbout = 1,
  112.     kFileQuit = 1
  113. };
  114.  
  115. enum 
  116. {
  117.     kForegroundSleep = 0,
  118.     kBackgroundSleep = 32000
  119. };
  120.  
  121. const RGBColor    rgbWhite    = { 0xFFFF, 0xFFFF, 0xFFFF };
  122.  
  123. SInt32 gSleepTime = kForegroundSleep;
  124. Boolean gDone = false, gfFrontProcess = true;
  125.  
  126. Point gapntResolution [kNumRes] = {{300, 400}, {384, 512}, {480, 640}, {600, 800}, {624, 832}, {768, 1024}, {870, 1152}, {1024, 1280}, {1600, 1200}, {1920, 1440}};
  127. short gResCurrent = 2;
  128. long gaFreq [kNumFreqs] = {56, 60, 65, 67, 72, 75, 76, 85, 90, 100, 120};
  129. short gFreqCurrent = 7;
  130. short gNumDevice = 0;
  131. char gstrMode [256] = "";
  132.  
  133. structGLInfo glInfo;
  134. AGLDrawable aglDraw = 0;
  135. AGLContext aglContext = 0;
  136. DSpContextReference dspContext = 0;
  137. GLuint gFontList = 0;
  138.  
  139. WindowPtr gpWindowError = NULL;
  140.  
  141.  
  142. // functions (internal/private) ---------------------------------------------
  143.  
  144. void InitToolbox(void)
  145. {
  146.     MenuHandle menu;
  147.  
  148.     MaxApplZone ();
  149.  
  150.     InitGraf((Ptr) &qd.thePort);
  151.     InitFonts();
  152.     InitWindows();
  153.     InitMenus();
  154.     TEInit();
  155.     InitDialogs(nil);
  156.     InitCursor();
  157.     
  158.     qd.randSeed =  TickCount();
  159.  
  160.     // Init Menus
  161.     menu = NewMenu (kMenuApple, "\p\024");            // new  apple menu
  162.     InsertMenu (menu, 0);                            // add menu to end
  163.     AppendResMenu(menu, 'DRVR');
  164.     
  165.     menu = NewMenu (kMenuFile, "\pFile");            // new menu
  166.     InsertMenu (menu, 0);                            // add menu to end
  167.     AppendMenu (menu, "\pQuit/Q"); // add items
  168.     
  169.     DrawMenuBar();
  170. } 
  171.  
  172. // --------------------------------------------------------------------------
  173.  
  174. Boolean SetUp (void)
  175. {
  176.     short i;
  177.     short fNum;
  178.  
  179.     InitToolbox ();
  180.     
  181.     // we want a context and a drawable    
  182.     gNumDevice = 0;
  183.     memset(&glInfo, 0, sizeof glInfo);
  184.     glInfo.width = gapntResolution [gResCurrent].h; // width of drawable (screen width in full screen mode)
  185.     glInfo.height = gapntResolution [gResCurrent].v; // height of drawable (screen height in full screen mode)
  186.     glInfo.fSizeMust = false;            // dspContext must be requested height (ignored in window mode)
  187.                                         // Note: This basically determines whether or not displays will step down to allocate or fail
  188.     glInfo.pixelDepth = 16;                // requested pixel depth
  189.     glInfo.fDepthMust = false;            // pixel depth must be set (if false then curretn depth will be used if able)
  190.     glInfo.fFullscreen = true;            // use DSp to get fullscreen?
  191.     glInfo.fAcceleratedMust = true;     // must renderer be accelerated?
  192.     glInfo.VRAM = 0 * 1048576;            // minimum VRAM (if not zero this is always required)
  193.     glInfo.textureRAM = 0 * 1048576;    // minimum texture RAM (if not zero this is always required)
  194.     glInfo.freq = gaFreq [gFreqCurrent]; // desired vertical refresh frquency in Hz (0 = any)
  195.     glInfo.fmt = 0;                        // output pixel format
  196.     
  197.     i = 0;
  198.     glInfo.aglAttributes [i++] = AGL_RGBA;
  199.     glInfo.aglAttributes [i++] = AGL_DOUBLEBUFFER;
  200.     glInfo.aglAttributes [i++] = AGL_NO_RECOVERY;
  201.     glInfo.aglAttributes [i++] = AGL_ACCELERATED;
  202.     glInfo.aglAttributes [i++] = AGL_RED_SIZE;
  203.     glInfo.aglAttributes [i++] = 8;
  204.     glInfo.aglAttributes [i++] = AGL_GREEN_SIZE;
  205.     glInfo.aglAttributes [i++] = 8;
  206.     glInfo.aglAttributes [i++] = AGL_BLUE_SIZE;
  207.     glInfo.aglAttributes [i++] = 8;
  208.     glInfo.aglAttributes [i++] = AGL_ALPHA_SIZE;
  209.     glInfo.aglAttributes [i++] = 0;
  210.     glInfo.aglAttributes [i++] = AGL_DEPTH_SIZE;
  211.     glInfo.aglAttributes [i++] = 16;
  212.     glInfo.aglAttributes [i++] = AGL_ALL_RENDERERS;
  213.     glInfo.aglAttributes [i++] = AGL_NONE;
  214.     
  215.     BuildGL (&aglDraw, &aglContext, &dspContext, &gNumDevice, &glInfo);
  216.     if (!aglDraw || !aglContext)
  217.     {
  218.         Rect rectWin = {100, 100, 200, 400};
  219.         DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  220.         gpWindowError = (WindowPtr) NewCWindow (NULL, &rectWin, "\p", 0, kWindowFloatProc, (WindowPtr)-1, 0, 0);
  221.         ShowWindow ((GrafPtr)gpWindowError);
  222.     }
  223.         
  224.     GetFNum("\pMonaco", &fNum);                                    // build font
  225.     gFontList = BuildFontGL (aglContext, fNum, normal, 9);
  226.     // set mode string
  227.     sprintf (gstrMode, "%d: %d x %d x %d (%d Hz)", gNumDevice, glInfo.width, glInfo.height, glInfo.pixelDepth, glInfo.freq);
  228.  
  229.     return true;
  230. }
  231.  
  232. // --------------------------------------------------------------------------
  233.  
  234. void DoMenu (SInt32 menuResult)
  235. {
  236.     SInt16 theMenu;
  237.     SInt16 theItem;
  238.     Str255 daName;
  239.     MenuRef theMenuHandle;
  240.         
  241.     theMenu = HiWord(menuResult);
  242.     theItem = LoWord(menuResult);
  243.     theMenuHandle = GetMenuHandle(theMenu);
  244.  
  245.     switch (theMenu)
  246.     {
  247.         case kMenuApple:
  248.             switch (theItem)
  249.             {
  250.                 case kAppleAbout:
  251.                     break;
  252.                 default:
  253.                     OpenDeskAcc(daName);
  254.                     break;
  255.             }
  256.             break;
  257.         case kMenuFile:
  258.             switch (theItem)
  259.             {
  260.                 case kFileQuit:
  261.                     gDone = true;
  262.                     break;
  263.             }
  264.             break;
  265.     }
  266.     HiliteMenu(0);
  267.     DrawMenuBar();
  268. }
  269.  
  270. // --------------------------------------------------------------------------
  271.  
  272. void DoKey (SInt8 theKey, SInt8 theCode)
  273. {
  274.     #pragma unused (theCode)
  275.     // up and down arrows change bit depth (stop at top and bottom)
  276.     // right and left arrows change size (stop at top and bottom)
  277.     // +(=) and - change frequency request
  278.     // [ and ] cnage requested display device
  279.     
  280.     short fNum;
  281.     
  282.     // resolution
  283.     if (theKey == '\35')
  284.     {
  285.         
  286.         if (++gResCurrent == kNumRes)
  287.             gResCurrent = 0;
  288.         glInfo.width = gapntResolution [gResCurrent].h;
  289.         glInfo.height = gapntResolution [gResCurrent].v;
  290.     }
  291.     else if (theKey == '\34')
  292.     {
  293.         if (--gResCurrent < 0)
  294.             gResCurrent = (short) (kNumRes - 1);
  295.         glInfo.width = gapntResolution [gResCurrent].h;
  296.         glInfo.height = gapntResolution [gResCurrent].v;
  297.     }
  298.     
  299.     // pixel depth
  300.     if (theKey == '\36')
  301.     {
  302.         glInfo.pixelDepth = 32;
  303.     }
  304.     else if (theKey == '\37')
  305.     {
  306.         glInfo.pixelDepth = 16;
  307.     }
  308.     
  309.     // frequency
  310.     if (theKey == '=')
  311.     {
  312.         
  313.         if (++gFreqCurrent == kNumFreqs)
  314.             gFreqCurrent = 0;
  315.         glInfo.freq = gaFreq [gFreqCurrent];
  316.     }
  317.     else if (theKey == '-')
  318.     {
  319.         if (--gFreqCurrent < 0)
  320.             gFreqCurrent = (short) (kNumFreqs - 1);
  321.         glInfo.freq = gaFreq [gFreqCurrent];
  322.     }
  323.     
  324.     // device 
  325.     if (theKey == ']')
  326.         gNumDevice++;
  327.     else if (theKey == '[')
  328.         gNumDevice--;
  329.     
  330.     // device 
  331.     if (theKey == 'w')
  332.         glInfo.fFullscreen = false;
  333.     else if (theKey == 'f')
  334.         glInfo.fFullscreen = true;
  335.     
  336.     glInfo.fSizeMust = false;            // dspContext must be requested height (ignored in window mode)
  337.     glInfo.fDepthMust = false;            // pixel depth must be set (if false then curretn depth will be used if able)
  338.     glInfo.fAcceleratedMust = true;     // must renderer be accelerated?
  339.     glInfo.VRAM = 0 * 1048576;            // minimum VRAM (if not zero this is always required)
  340.     glInfo.textureRAM = 0 * 1048576;    // minimum texture RAM (if not zero this is always required)
  341.  
  342.     // rebuild GL
  343.     if (gpWindowError)
  344.     {
  345.         DisposeWindow ((WindowPtr)gpWindowError);
  346.         gpWindowError = NULL;
  347.     }
  348.     DeleteFontGL (gFontList);
  349.     DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  350.     BuildGL (&aglDraw, &aglContext, &dspContext, &gNumDevice, &glInfo);
  351.     if (!aglDraw || !aglContext)
  352.     {
  353.         Rect rectWin = {100, 100, 150, 200};
  354.         DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);        
  355.         gpWindowError = (WindowPtr) NewCWindow (NULL, &rectWin, "\p", 0, kWindowFloatProc, (WindowPtr)-1, 0, 0);
  356.         ShowWindow ((GrafPtr)gpWindowError);
  357.     }
  358.             
  359.     GetFNum("\pMonaco", &fNum);                                    // build font
  360.     gFontList = BuildFontGL (aglContext, fNum, normal, 9);
  361.     // set mode string
  362.     sprintf (gstrMode, "%d: %d x %d x %d (%d Hz)", gNumDevice, glInfo.width, glInfo.height, glInfo.pixelDepth, glInfo.freq);
  363.     DoUpdate ();
  364. }
  365.  
  366. // --------------------------------------------------------------------------
  367.  
  368. void DoUpdate (void)
  369. {
  370.     if (aglDraw && aglContext)
  371.         drawGL (aglContext, &glInfo);
  372.     else
  373.     {
  374.         GrafPtr gpSave;
  375.         GetPort (&gpSave);
  376.         SetPort (gpWindowError);
  377.         MoveTo (10, 20);
  378.         DrawString ("\pBuildGL failed.");
  379.         SetPort (gpSave);
  380.     }
  381. }
  382.  
  383. // --------------------------------------------------------------------------
  384.  
  385. void DoEvent (void)
  386. {
  387.     EventRecord theEvent;
  388.     Rect rectGrow;
  389.     SInt32 menuResult;
  390.     WindowRef whichWindow;
  391.     long grow;
  392.     SInt16 whatPart;
  393.     SInt8 theKey;
  394.     SInt8 theCode;
  395.     Boolean fProcessed = false;
  396.     
  397.     if (WaitNextEvent(everyEvent, &theEvent, gSleepTime, NULL))
  398.     {
  399.         if (dspContext)
  400.             DSpProcessEvent (&theEvent, &fProcessed);
  401.         if (!fProcessed)
  402.         {
  403.             switch (theEvent.what)
  404.             {
  405.                 case mouseDown:
  406.                     whatPart = FindWindow(theEvent.where, &whichWindow);
  407.                     switch (whatPart)
  408.                     {
  409.                         case inGoAway:
  410.                             break;
  411.                         case inMenuBar:
  412.                             DrawMenuBar();
  413.                             menuResult = MenuSelect(theEvent.where);
  414.                             if (HiWord(menuResult) != 0)
  415.                                 DoMenu(menuResult);
  416.                             break;
  417.                         case inDrag:
  418.                             DragWindow (whichWindow, theEvent.where, &(**LMGetGrayRgn()).rgnBBox);
  419.                             break;
  420.                         case inGrow:
  421.                             SetRect (&rectGrow, 100, 100, 20000, 20000);
  422.                             grow = GrowWindow (whichWindow, theEvent.where, &rectGrow);
  423.                             if (grow)
  424.                             {
  425.                                 SizeWindow (whichWindow, grow & 0x0000FFFF, grow >> 16, true);
  426.                                 // do content stuff here
  427.                                 SetPort (whichWindow);
  428.                                 InvalRect (&whichWindow->portRect);                // redraw all
  429.                             }
  430.                             break;
  431.                         case inSysWindow:
  432.                             SystemClick(&theEvent, whichWindow);
  433.                             break;
  434.                     }
  435.                     break;
  436.                 case keyDown:
  437.                 case autoKey:
  438.                     theKey = theEvent.message & charCodeMask;
  439.                     theCode = (theEvent.message & keyCodeMask) >> 8;
  440.                     if ((theEvent.modifiers & cmdKey) != 0)
  441.                     {
  442.                         menuResult = MenuKey(theKey);
  443.                         if (HiWord(menuResult) != 0)
  444.                             DoMenu (menuResult);
  445.                     }
  446.                     else
  447.                         DoKey (theKey, theCode);
  448.                     break;
  449.                 case updateEvt:
  450.                     BeginUpdate((WindowRef) theEvent.message);
  451.                     DoUpdate();
  452.                     EndUpdate((WindowRef) theEvent.message);
  453.                     break;
  454.                 case diskEvt:
  455.                     break;
  456.                 case osEvt:
  457.                     if (theEvent.message & 0x01000000)        //    Suspend/resume event
  458.                     {
  459.                         if (theEvent.message & 0x00000001)    //    Resume
  460.                         {
  461.                             gSleepTime = kForegroundSleep;                            
  462.                             DoUpdate ();
  463.                             aglSetDrawable(aglContext, aglDraw);
  464.                             SelectWindow ((GrafPtr) aglDraw);
  465.                             gfFrontProcess = true;
  466.                         }
  467.                         else
  468.                             gSleepTime = kBackgroundSleep;    //    Suspend
  469.                             aglSetDrawable(aglContext, NULL);
  470.                             HideWindow((GrafPtr) aglDraw);
  471.                             gfFrontProcess = false;
  472.                     }
  473.                     break;
  474.  
  475.                 case kHighLevelEvent:
  476.                     AEProcessAppleEvent(&theEvent);
  477.                     break;
  478.             }
  479.         }
  480.     }
  481.     else
  482.     {
  483.         DoUpdate ();
  484.     }
  485. }
  486.  
  487. // --------------------------------------------------------------------------
  488.  
  489. void CleanUp (void)
  490. {
  491.     MenuHandle hMenu;
  492.  
  493.     glFinish ();                                                // flush and sync
  494.     DeleteFontGL (gFontList);
  495.     DestroyGL (&aglDraw, &aglContext, &dspContext, &glInfo);
  496.  
  497.     if (gpWindowError)
  498.     {
  499.         DisposeWindow ((WindowPtr)gpWindowError);
  500.         gpWindowError = NULL;
  501.     }
  502.  
  503.     hMenu = GetMenuHandle (kMenuFile);
  504.     DeleteMenu (kMenuFile);
  505.     DisposeMenu (hMenu);
  506.  
  507.     hMenu = GetMenuHandle (kMenuApple);
  508.     DeleteMenu (kMenuApple);
  509.     DisposeMenu (hMenu);
  510. }
  511.  
  512. // --------------------------------------------------------------------------
  513.  
  514. int main (void)
  515. {
  516.     if (SetUp ())    
  517.         while (!gDone) 
  518.             DoEvent ();
  519.     CleanUp ();
  520.     return 0;
  521. }
  522.  
  523.  
  524. #pragma mark -
  525. //-----------------------------------------------------------------------------------------------------------------------
  526.  
  527. // OpenGL Drawing
  528.  
  529. void drawGL(AGLContext aglContext, pstructGLInfo pglInfo)
  530. {
  531.     static float f, s, c;
  532.     GLboolean fState = GL_FALSE;
  533.  
  534.     f += 0.01;
  535.     s = sin(f);
  536.     c = cos(f);
  537.  
  538.     glClearColor(0.15f, 0.15f, 0.15f, 1.0f);                    // Clear color buffer to dark grey
  539.     glClear(GL_COLOR_BUFFER_BIT);
  540.     
  541.     glBegin(GL_POLYGON);                                        // Draw a smooth shaded polygon
  542.     glColor3d(1.0, 0.0, 0.0);
  543.     glVertex3d(s, c, 0.0);
  544.     glColor3d(0.0, 1.0, 0.0);
  545.     glVertex3d(-c, s, 0.0);
  546.     glColor3d(0.0, 0.0, 1.0);
  547.     glVertex3d(-s, -c, 0.0);
  548.     glColor3d(0.7, 0.7, 0.7);
  549.     glVertex3d(c, -s, 0.0);
  550.     glEnd();
  551.  
  552.     // Draw frame rate (set color and position first)
  553.     glColor3d(1.0, 1.0, 1.0);
  554.     glRasterPos3d (-120.0 / (float) pglInfo->width, (pglInfo->height - 40.0) / (float) pglInfo->height, 0.0); 
  555.     DrawFrameRate (gFontList);
  556.     glRasterPos3d (-160.0 / (float) pglInfo->width, (pglInfo->height - 65.0) / (float) pglInfo->height, 0.0); 
  557.     DrawContextInfo (gFontList);
  558.  
  559.     aglSwapBuffers(aglContext);                                        // send swap command
  560. }
  561.  
  562. //-----------------------------------------------------------------------------------------------------------------------
  563.  
  564. // Draw frame rate in curent color at current raster positon with provided font display list
  565.  
  566. void DrawFrameRate (GLuint fontList)
  567. {    
  568.     static char aChar[256] = "";
  569.     static AbsoluteTime time = {0,0};
  570.     static long frames = 0;
  571.  
  572.     AbsoluteTime currTime = UpTime ();
  573.     float deltaTime = (float) AbsoluteDeltaToDuration (currTime, time);
  574.     
  575.     frames++;
  576.  
  577.     if (0 > deltaTime)    // if negative microseconds
  578.         deltaTime /= -1000000.0;
  579.     else                // else milliseconds
  580.         deltaTime /= 1000.0;
  581.     if (0.5 <= deltaTime)    // has update interval passed
  582.     {
  583.         sprintf (aChar, "Swaps/Sec: %0.1f", frames / deltaTime);
  584.         time = currTime;    // reset for next time interval
  585.         frames = 0;
  586.     }
  587.     
  588.     DrawCSringGL (aChar, fontList);
  589. }
  590.  
  591. //-----------------------------------------------------------------------------------------------------------------------
  592.  
  593. // Draw height,width, bit pixel and frequency for context
  594.  
  595. void DrawContextInfo (GLuint fontList)
  596. {    
  597.     DrawCSringGL (gstrMode, fontList);
  598. }
  599.  
  600. #pragma mark -
  601. //-----------------------------------------------------------------------------------------------------------------------
  602.  
  603. void DrawPSringGL (Str255 pstrOut, GLuint fontList)
  604. {
  605.     GLint i;
  606.     for (i = 1; i <= pstrOut[0]; i++)
  607.         glCallList (fontList + pstrOut[i]);
  608. }
  609.  
  610. //-----------------------------------------------------------------------------------------------------------------------
  611.  
  612. void DrawCSringGL (char * cstrOut, GLuint fontList)
  613. {
  614.     GLint i = 0;
  615.     while (cstrOut [i])
  616.         glCallList (fontList + cstrOut[i++]);
  617. }
  618.  
  619. //-----------------------------------------------------------------------------------------------------------------------
  620.  
  621. GLuint BuildFontGL (AGLContext ctx, GLint fontID, Style face, GLint size)
  622. {
  623.     GLuint listBase = glGenLists (256);
  624.     if (aglUseFont (ctx, fontID , face, size, 0, 256, (long) listBase))
  625.         return listBase;
  626.     else
  627.     {
  628.         glDeleteLists (listBase, 256);
  629.         return 0;
  630.     }
  631. }
  632.  
  633. //-----------------------------------------------------------------------------------------------------------------------
  634.  
  635. void DeleteFontGL (GLuint fontList)
  636. {
  637.     if (fontList)
  638.         glDeleteLists (fontList, 256);
  639. }